find quartiles in R